function verdeling()

	% Klein even
	v  = 390.578;
	h = 2.5406;
	k = 2.10666;
	th = 33.4468;
	ke = 0;

	for x=0:2:1200
		tmp = v*((x-h)**(k-1))*exp(-x/th);
		if isreal(tmp)
			ke += tmp*x;
		endif
	endfor

	% Klein oneven
	v = 3866.58;
	h = 3.77876;
	k = 2.18497;
	th = 33.4937;
	ko = 0;

	for x=1:2:1200
		tmp = v*((x-h)**(k-1))*exp(-x/th);
		if isreal(tmp)
			ko += tmp*x;
		endif
	endfor

	% Groot even
	v = 4e16;
	h = 1204;
	k = 1.46227;
	th = 40.6273;
	ge = 0;

	for x=1200:2:2400
		tmp = v*((x-h)**(k-1))*exp(-x/th);
		if isreal(tmp)
			ge += tmp*x;
		endif
	endfor


	% Groot oneven
	v = 4e16;
	h = 1204.36;
	k = 2.11872;
	th = 33.6153;
	go = 0;

	for x=1201:2:2400
		tmp = v*((x-h)**(k-1))*exp(-x/th);
		if isreal(tmp)
			go += tmp*x;
		endif
	endfor
	
	amount = 5e6;
	printf("Klein even som: %f\tgem: %f\n", ke, ke/amount);
	printf("Klein oneven som: %f\tgem: %f\n", ko, ko/amount);
	printf("Groot even som: %f\t gem: %f\n", ge, ge/amount);
	printf("Groot oneven som: %f\t gem: %f\n", go, go/amount);
	
	printf("Som: %f\n", (ke+ko+ge+go));
	printf("Gem: %f\n", (ke+ko+ge+go)/amount);
endfunction
